1 IFA=0THENPOKE53265,PEEK(53265)AND239:A=1:LOAD"EXPANDBAS",8,1 2 POKE53265,PEEK(53265)OR16:SYS49152 4 POKE53272,37:POKE648,200:POKE53240,0 5 POKE53280,0:POKE53281,0:SYS58692 10 PRINT"[147][144]LOAD"CHR$(34)"LC.MAIN"CHR$(34)",8":PRINT"RUN" 20 POKE631,19:FORI=1TO6:POKE632+I,13:NEXT:POKE198,7:NEW